
*******************************************************************************************
*******************************************************************************************
******************** Reclassification Risk in the Small Group Health Insurance Market
******************* by Sebastian Fleitas, Gautam Gowrisankaran and Anthony Lo Sasso 
*******************************************************************************************
*******************************************************************************************
*******************************************************************************************
******************** Figure C1
*******************************************************************************************
*******************************************************************************************
*******************************************************************************************

  
graph set window fontface "Times New Roman" 
set scheme s2mono

clear all 
cd "/Users/sebastianfleitas/Dropbox/MULTICHOICE_PROJECT/PREMIUMS_AND_HEALTHSHOCKS/Tables_RESTAT/Do_files_Analysis/Heterogeneity"
insheet using data_for_eventstudy_state2023.csv, clear


label define namesstates 1 "Arkansas (N=1,207)"  2"Delaware (N=64)"  3 "Texas (N=9,170)" 4 "Pennsylvania (N=542)" 5 "Illinois (N=6,152)" 6 "Missouri (N=2,997)" 7 "Oklahoma (N=2,008)" 8 "Tennessee (N=1,808)" 9 "Wisconsin (N=7,071)" 10 "Wyoming (N=41)" 
label values state namesstates 
*twoway (scatter coef state, yla(-1000(1000)3000) xlabel(1(1)10) yline(0) mcolor(grey) msymbol(square)  msize(small) legend(lab( 1 "Coefficient"))) (rcap lowbound upperbound state , legend(lab( 2 "95% Confidence Interval")) lcolor(grey)), scheme(s1color) xlabel(, valuelabels angle(90) labsize(vsmall))  xtitle("") title(Heterogeneity of Pass-through by State) 
*cd "/Users/sebastianfleitas/Dropbox/MULTICHOICE_PROJECT/PREMIUMS_AND_HEALTHSHOCKS" 
*graph export graph_states.png, replace


drop if state==2
drop state
gen state = _n
label define namesstates2 1 "Arkansas (N=1,207)"  2"Texas (N=9,170)" 3 "Pennsylvania (N=542)" 4 "Illinois (N=6,152)" 5 "Missouri (N=2,997)" 6 "Oklahoma (N=2,008)" 7 "Tennessee (N=1,808)" 8 "Wisconsin (N=7,071)" 9 "Wyoming (N=41)" 
label values state namesstates2 
*twoway (scatter coef state, yla(-1000(1000)3000) xlabel(1(1)9) yline(0) mcolor(grey) msymbol(square)  msize(small) legend(lab( 1 "Coefficient"))) (rcap lowbound upperbound state , legend(lab( 2 "95% Confidence Interval")) lcolor(grey)), scheme(s1color) xlabel(, valuelabels angle(90) labsize(vsmall))  xtitle("") title(Heterogeneity of Pass-through by State) 


drop if _n==9 
label define namesstates3 1 "Arkansas (N=1,207)"  2"Texas (N=9,170)" 3 "Pennsylvania (N=542)" 4 "Illinois (N=6,152)" 5 "Missouri (N=2,997)" 6 "Oklahoma (N=2,008)" 7 "Tennessee (N=1,808)" 8 "Wisconsin (N=7,071)"
label values state namesstates3 
twoway (scatter coef state, yla(-500(1000)2000) xlabel(1(1)8) yline(0) mcolor(grey) msymbol(square)  msize(small) legend(lab( 1 "Coefficient"))) (rcap lowbound upperbound state , legend(lab( 2 "95% Confidence Interval")) lcolor(grey)), scheme(s1color) xlabel(, valuelabels angle(90) labsize(vsmall))  xtitle("") 
*title(Heterogeneity of Pass-through by State) 

graph export graph_state2023.png, replace
